#Include "Protheus.ch"

User Function Estoq()

	Local cCFOP := "('5101/5501/6107/6109/6101/6501/5401/6401/6910/5910/6911/5911/6912/5912/6914/6105"

	StrTran(cCFOP, "/", "','")
	
	cCFOP += "')"
	
	Alert(cCfop)


Return Nil